IDENTIFICATION 


PRODUCT CODE: 
PRODUCT NAME: 

DATE: 

MAINTAINER: 
AUTHOR: 

REPLACES: 


MAINDEC-08-DHDRA-A-D 

DR8-EA 12 CHANNEL BUFFERED 
DIGITAL INTERFACE 

MARCH, 1972 

DIAGNOSTIC GROUP 

MICHAEL DAVIS/P« COYNE 

MAINDEC-8E-D0QB 




ADVANCE COPY 
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L i AB- r ,/ACT 

THIS PROGRAM is a diagnostic and exerciser for the 
DR8-EA 12 CHANNEL BUFFERED DIGITAL INTERFACE # ALL 
functions are Tested and errors are reported by halts 
and/or error typequts, 

2 , REQUIREMENTS 

2.1 ' EQUIPMENT 

PD p 8E STANDARD COMPUTER WITH 4K OF CORE 
ASR-33 TELETYPE (OR EQUIVALENT) 

DR3-EA WITH TEST CABLE 

2.2 STORAGE 

the program uses location 0000-3377 ' 

3 1 LOADING procedure 

the STANDARD PROCEDURE FOR LOADING BINARY TaPES SHOULD 
BE USED, 

4, STARTING PROCEDURE 

4.1 STARTING address 

200- iNPUT device configuration 

201- START WITH STANDARD CONFIGURATION 

4.2 SWITCH SETTINGS 

FOR EITHER STARTING ADDRESS, NORMAL SETTING IS SR0*SRll 
0 (DOWN) , 

4.3 PROGRAM AND/OR OPERATOR ACTION 

LOAD PROGRAM INTO MEMORY 

SET SWITCH REGISTER TO DESIRED STARTING ADDRESS . 

LOAD -ADDRESS 

CLEAR SWITCHES 

PRESS CLEAR AND CONTINUE 



4.3.1 FOR STARTING ADDRESS 200 - 

THE PROGRAM WILL TYPE "SET SR FOR DEVICE CODE AND CONT" 

and then halt, 

SET SWITCHES TO 00X WHERE X IS AN OCTAL 

NUMBER CORRESPONDING TO THE 3 LS8 OF THE DEVICE SELECTOR COD^. 
PRESS CONTINUE', 

PROGRAM WILL RESPOND BY TYPING 

"SET SR FOR INTERRUPT JUMPERS AND CONT" AND THEN HALT, 

' SET SWITCHES FOR ALL INPUT REGISTER BITS JUMPERED TO INTERRUPT', 
PRESS CONTINUE, 

PROGRAM WILL RESPOND BY TYPING 

"SET SR FOR FLIPFLOP JUMPERS AND CONT" AND THEN HALT, 

SET SWITCHES FOR ALL INPUT REGISTER FLIPR.OPS, 

PRESS -CONTINUE. 

PROGRAM WILL RESPOND BY TYPING 
"SET SR FOR RUN" AND THEN HALT', 

SET SWITCHES AS IN 4.2 OR 5,1 
PRESS CONTINUE, 

PROGRAM WILL BEGIN TEST EXECUTION 

4.3.2 FOR STARTING ADDRESS 201 


SET SWITCHES AS IN 4.2 OR 5.1 
PRESS CLEAR AND CONTINUE, 

PROGRAM W.IUL BEGIN TEST EXECUTION 









operating procedure 
, i operational: switch settings 

SR0=i, SUPPRESS ERROR HALT 
SRIsi, SUPPRESS ERROR TYPEOUT 
SR2si, LOOP ON CURRENT TEST 
SR3=1, LOOP WITH CURRENT DATA 

SR4?! s SUPPRESS BELL OR TYPEOUT AT END OF PASS 

SR5sl, SUPPRESS ITERATIONS 

SR6sl J ESCAPE TO NEXT TEST ON ERROR 

,2 PROGRAM AND/OR OPERATOR ACTION 

,2,l-,i WITH SWITCHES SET AS IN 4,2, THE PROGRAM WILL RUN ALL 

tests sequentially, each iot test will be repeated 4096 
times, each data test will be repeated 50 times, after 

all TESTS HAVE BEEN COMPLETED* THE PROGRAM WILL TYPE !! DR” 
AND START ALL fESTS AGAIN, 

IP AN error occurs* the program will halt and type an 

APPROPRIATE ERROR MESSAGE (SEE SECTION 6 FOR DETAILS), 

,2,1,2 WITH SR@=1 (UP)i PROGRAM ACTION WILL BE AS IN 5,2,4,1* 
EXCEPT NO fYPEQUT WILL OCCUR, 

,2,1,3 WITH SR2sl?UP) PROGRAM ACTION WILL BE AS IN 

5,2,1,1. EXCEPT N'O TYPEOUT WILL OCCUR', THE ADDRESS OF THE 

failing, test will be displayed in the computer ac', 

,2,1.4 WITH SP4 = liuP) 8 PROGRAM ACTION WILL BE AS IN 5,2,1’,1 EXCEPT 
NO END OF PASS TYPEOUT WILL OCCUR, 

,2,1,5 WITH SR5n (UP), EACH TEST WILL BE EXECUTED ONLY ONCE, 

INSTEAD OF TYPING «DR", THE PROGRAM WILL RING THE TTY BELL 

,2,1,6 WJYh SR0 = 1 AND SR6®1, PROGRAM ACTION WILL BE AS In 5,2,i*,l 
IF NO ERRORS OCCUR, 

"IT AN ERROR OCCURS, THE PROGRAM WILL TYPE AN APPROPRIATE 
ERROR MESSAGE AND JMmEBIaYLY TERMINATE ITERATIONS OF THE 
F AI L~ 2 N G TEST, THE' PROGRAM WILL THEN ST.AR? THE NEXT TEST 

IN SEQUENCE, 



6 , 


6,1 


6 i 2 


6,3 


6,4 


7, 


7,1 


7,2 


ERRORS 


normal operation 

IF AM ERROR OCCURS WITH SWITCHES SET AS IN 4,2i the PROGRAM 
will type an APPROPRIATE ERROR MESSAGE (WITH DATA IF APR* 
LICA9LE) AND HALT, 

the format qf the error typeout is 
xxxx MESSAGE 

HEADER FOR DATA (IF APPLICABLE) 

DATA (IF APPLICABLE) 

XXXs ADDRESS OF JmS TO ERROR ROUTINE IN TEST THAT FAILED'. 

ERROR RECOVERY 

SET "SR6 = i(UP) fO ESCAPE TO NEXT TEST, PRESS CONTINUE, 

ERROR LOOP (IQf S ) 

SET SR0=1 TO SUPPRESS HALT 
SET SR1=1 TO SUPPRESS TYPEOUT 

set sR2n to loop on current failing test 

ERROR LOOP (DATA) 

Same AS 6,3 EXCEPT USE SR3 INSTEAD OF SR2 TO LOOP WJTH CURRENT 
Data', 

RESTRICTIONS 

STARTING RESTRICTIONS 

test JUMPER CABLE MUST BE INSTALLED, 
any floating Inputs to input register should be 
grounded, or errors may'occur, 

OPERATING RESTRICTIONS 
NOME 





MISCELLANEOUS 

execution Time 


execution time is approximately 3 minutes for full iteration 

and APPROXIMATELY 3.2 SECONDS WITH ITERATIONS SUPPRESSED, 

program description 

the DR8»EA IS A TEST OF ALL FUNCTIONS OF THE INTERFACE, 


the program sequence is as follows? 5 

all basic iOT TESTS are EXECUTED 4096 TIMES, 

all OUTPUT REGISTER .FUNCTIONS ARE TESTED WITH BINARY COUNT PATTERNS, 
all INPUT REGISTER-FUNCTIONS ARE TESTED USING BINARY COUNT- PATTERNS', 
INTERACTION BETWEEN INPUT AND OUTPUT REGISTERS IS TESTED FOR 

with binary count patterns, 

all skips and Interrupts are tested using binary count patterns', 



/MMNDEC»08*DhDRA' , A 


0030 

0000 

typflg 

0031 

0000 

lpcnt, 

0032 

0261 

XDBDIi 

0033 

0266 

XDBEI, 

0034 

0273 

xdbsk, 

0035 

0300 

XDBCI, 

0036 

0305 

XDBRI, 

0037 

0312 

XOBCO, 

0040 

0317 

XDBSOi 

0041 

0324 

XDBRO« 

004 2 

3200 

XPRINT 

0043 

3251 

XTYPE. 

0044 

2600 

XERROR 

0045 

2667 

XLOOP1 

0046 

2712 

XL00P2 


0200 

«200 • 

0200 

5202 


0201 

5244 


0202 

6007 

SYART1 

0.203 

4442 


0204 

3377 


0205 

7402 


0206 

7604 


0207 

0377 


0210 

7106 


0211 

7004 


0212 

1376 


0213 

3247 


0214 

4442 


3215 

3420 


3216 

7402 


0217 

7604 


0220 

3026 


3221 

4442 


0222 

3444 


722 3 

7402 


0224 

7604 


0225 

3027 


0226 

1375 


0227 

3020 


0230 

1260 


0231 

3233 


0232 

1247 


0233 

0000 

PNTRl, 

0 23 4 

2233 


-235 

2247 


0236 

2-020 
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POINTERS 


/indirect 
/ 

DBDIX 

DBEIX 

DBSKX 

DBCIX 

DBRIX 

DBCOX 

DBSOX 

DBROX 

PRINT 

TYPE 

error 

LOOP1 

LOOP2 

/ 

/TEST INITIALIZATION 
/ 


JMP 

SYART1 


JMP 

START2 


CAF 


/CLEAR ALL FLAGS 

JMS I 

XPRINT 

/TYPE "SET SR FOR DEVI 

Ml-1 


/CODE AND CONT" 

HIT 


/HALT FOR SWITCHES 

LAS 


/GET SWITCHES 

AND 

(7 

/MASK DEVICE CODE 

CLL RTL 


/POSITION SITS 

RAL 



TAD 

(6500 

/GENERATE BASIC IOT 

DC A 

IOTS 

/save basic lot 

JMS I 

XPRINT 

/TYPE "SET SR FOR 'JUMP 

M2»l 


/AND CONT’* 

HLT 


/halt FOR SWITCHES 

LAS 


/GET SWITCHES 

DC A 

I JUMPER 

/SAVE JUMPER MASK 

JMS I 

XPRINT 


M2A-1 



HLT 



LAS 



DCA 

F JUMPER 


TAD 

(®10 

/8 IOTS WILL BE 

DCA 

CNfRl 

/SET UP 

TAD 

DIQT 

/STORE INSTRUCTION FOR 

DCA 

PNfRl 

/JOT SET UP 

TAD 

10TS 

/GET IOT 

0 


/STORE IT 

ISZ 

PNtRl 

/PREPARE TO STORE 

ISZ 

iofs 

/NEXT IOT 

ISZ 

CNTR1 
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7421 

7501 

7002 

6007 

6003 

4432 

4433 

4434 

4435 
443.6 
4437 

4440 

4441 


3026 

3027 


/MAI.NDEC»08-OHDRA»A 


/DR8-EA 

/12 channel buffered I/O 
/COPYRIGHT 1972.* DIGITAL 
/ 

/STARTING ADDRESS-! 

/ 

/ 

■/SWITCH REGISTER OPTIONS 


DIAGNOSTIC 
EQUIPMENT corp, 

203-INPU 

201-USE 


/ 

/SR00 =1* SUPPRESS.HALT ON ERROR 

/SR01 *1, SUPPRESS ERROR TYPEOUT 

/SR02 si, LOOP ON CURRENT TEST 
/SR03 si, LOOP Wl'f-H. CURRENT DATA ■ 

/SR04 -si, SUPPRESS BELL AT END OF PASS 

/SR05 =1* SUPPRESS ITERATIONS 

/SR06 =1, ESCAPE TO NEXT TEST ON ERROR 


/ 

/INSTRUCTION DEFINITIONS 


/ 


MQL=7421 



MQA's'7501 



B S W = 7-0 0 2 



CAF = 6007 



SRQ.s 6-003 



■DBDIsJMS 

I 

XD3DT 

0 B EI = J M S 

I 

XDBEi 

D-BSKsJMS 

I 

XOBSK 

DBC I =JMS 

I 

XDBC-I 

dbri=jms 

I 

XDBRI 

DBCOsJ-MS 

I 

XDBCO 

DBSO=JMS 

I 

XDBSO 

DBRO=JMS 

I 

XDBRO 


/ 

/LOCATION EQUIVALENCIES 


/ 

MSTDGTsERAOR+l 
LSTDGTsER.ADR + 2 


0010 

0010 0000 
0020 
0320 0000 

021 0000 
022 2000 
0023 0000 

0024 3000 

0025 0000 

0026 7777 


/ 

/GENERAL VARIABLES 
/ 

*10 

PQ INTI * 0 
»20 

CN'TRl, 0 

D A ? A l j 0 
D A T A 2 * 0 

DAT A3 * 0 

D A T A 4 * 0 

DATA5* 0 

TJUMPE, 7777 /INTERRUPT JUMPER MASK 


0027 7777 FJUMPE, 7777 


/FLIPFLOP JUMPER MASK 


, MAYNARD* MASS, 01754 

T DEVICE CONFIGURATION 
STANDARD CONFIGURATION 
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0237 

5232 

JHP 

PNfRl-1 


0240 

4442 

JMS I 

XPRINT 

/TYPE ’’SET SR FOR RUN 

0241 

3475 

M3-1 


/AND CQNT 

0242 

7402 

hlt 


/HALT FOR SWITCHES 

0243 

7300 

CLA CLL 



0244 

3030 ST ART2 » 

DC A 

typflg 

/CLEAR ERROR FLAG 

0245 

5646 

JMP I 


/GO TO FIRST TEST 

0246 

0400 

INITl 




/CLEAR TYPE FLAG 


0261 0000 
0262 6500 


dbdix 


/INITIALIZATION 

/ 


0247 

0000 

IOTS, 

0 

0250 

0262 

tlQT, 

DBDIX*! 

0251 

0267 


D8EIX+1 

0252 

0274 


DBSKX*1 

0253 

0301 


DBCIX*1 

0254 

0306 


D8RIX*1 

0255 

0.313 


DBCOX*l 

0256 

0320 


DBSQX*i 

0257 

0325 


DBROX^l 

0260 

3650 

DI0T 5 

DCA I 


constants AND variables 
/BASIC 10T 


t i or 

/ 

/1OT SUBROUTINES 
/ 

/DISABLE DATA BUFFER INTERRUPT (DBDI.65X0S 
/ 

0 

6500 


2263 7410 

0264 7402 

0265 5661 


2266 0000 DBEIXs 

2267 6501 

3273 7410 

0271 7402 

2272 5666 


2273 0000 DBSKXi 

2274 6502 


SKP 


HLT 

JMP I 

DBDIX 

/ 

/ENABLE 

/ 

0 

6501 

DAtA BUFFER I 

SKP 


hlt 

JMP I 

□ BE IX 

/ 

/SKIP ON 

DATA BUFFER 

0 

6502 



/TRAP FOR QNDESI RED 
/SKIPS 


NTERRUPTS (D3EI « 65X1) 


/TRAP FOR QNDESI RED 
/SKIPS 


INPUT FLAG (DBSK«65X2) 


275 

7410 

SKP 



276 

2273 

ISZ 


DBSKX 

277 

5673 

JMP 

/ 

/0S 

I 

DBSKX 



TO 

input register corresponding 



/TO 

IS 

IN AC < DBG 2,65X3) 


/ 
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0300 

0000 

DBCIX s 

0 


0301 

6503 


6503 


0302 

7410 


SKP 

/TRAP FOR ONDESIRED 

0303 

7402 


HLT 

/SKIPS 

0304 

5700 


JMP I 

DBCIX 




/ 

/INPUT 

y 

REGISTER TO AC (DBRI ? 65X4) 

0305 

0000 

DBRIXi 

/ 

0 


0306 

6504 


6504 


0307 

7410 


SKP 

/TRAP FOR UNDESIRE9 

0310 

7402 


mlt 

/SKIPS 

0311 

5705 


JMP I 

DBR I X 




/ 

/ZEROS 

TO OUTPUT REGISTER CORRESPONDING TO 




/ONES 

IN Ac (DBCOfl 65X5 5 

0312 

0000 

DBCOXs 

0 


0313 

6505 


6505 


0314 

7410 


SKP 

/TRAP FOR ONDESIRED 

0315 

7402 


hit 

/SKIPS 

0316 

5712 


JMP I 

DBCQX 




j 

/IS TO 

OUTPUT register corresponding 




/TO IS 

V 

IN AC (DBSOs 65X6) 

0317 

0000 

DBSQX e 

/ 

0 


0320 

-6506 


6506 


0321 

7410 


SKP 

/TRAP FOR UNDESIRED 

0322 

7402 


hlt 

/SKIPS 

0323 

5717 


JMP I 

i 

DBSOX 




/JAM TRANSFER OUTPUT REGISTER TO A@ {DBRO 65X7 
* 

0324 

0000 

DBROXi 

f 

0 


0325 

6507 


630? 


0326 

7410 


SKP 

/TRAP FOR ONDESIRED 

0327 

7402 


hlt 

/SKIPS' 

0330 

5724 


JMP I 

D8R0X 

0375 

7770 




0376 

6500 




0377 

0007 



' 


0400 

RASE 




/ 

/IS OUTPUT REGISTER CLEARED BY INITIALIZE? 
/ 
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0400 

3030 

INI T1, 

DCA 7YPFLG 

0401 

3031 


DC A . LPCNT 

0402 

6007 


CAF 

0403 

4441 


DSRO 

0404 

3021 


DCA DATA1 

0405 

1021 


TAD DAtAl 

0406. 

7650 


SNA CLA 

0407 

5214 


JMP ,*5 

0410 

4444 


JMS I XERROR 

0411 

3645 


INITlE.l 

0412 

3515 


DH1-1 

0413 

7777 


®1 

0414 

4445 


JMS I XLOOP1 

0415 

52-02 


JMP INIT1*2 

/ 

/IS INPUT REGISTER 

j 

04i6 

3030 

INI T 2 * 

/ 

DCA typflg 

0417 

3031 


DCA LPCNT 

0420 

7410 


SKP 

0421 

6007 


CAF 

0422 

4436 


DBRI 

0423 

3021 


DCA DAtAl 

0424 

1021 


TAD DAtAl 

0425 

7650 


SNA CLA 

0426 

5233 


JMP ,*5 

0427 

4444 


JMS I XERROR 

0430 

3661 


I NI T2E®1 

0431 

3515 


DH1-1 

0432 

7777 


w l 

0433 

4445 


JMS I XLOOP1 

0434 

5221 


JMP INIT2+3 

/ 

/IS SKIP FLAG SET 
/ 

DCA TYPFLG 

0435 

3030 

INIT3, 

0436 

3031 


DCA LPCNT 

0437 

7410 


SKP 

0440 

6007 


CAF 

0441 

4433 


DBE I 

•0442 

6003 


SRQ 

0443 

5250 


JMP ,*5 

0444 

4444 


JMS I XERROR 

0445 

4042 


INT1E*1 

0446 

3514 


DHS-1 

0447 

0000 


0 

0450 

4 434 


DBSK 

0451 

5256 


JMP ,*5 

0452 

4444 


JMS I XERROR 

0453 

3674 


INIT3E*! 

0454 

3514 


DH0»1 

045.5 

0000 


0 

0456 

4445 


JMS I XLOOP1 

0457 

5240 


JMP INIT3+3 
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/CLEAR ERROR FLAG 

/SET ITERATION COUNT TO 4096(DEC I HAL) 

/initialize interface 

/READ OUTPUT REGISTER 

/SAVE REGISTER DATA 

/GET REGISTER DAfA 

/WAS REGISTER CLEARED BY INITIALIZE 

/DATA CORRECTS CONTINUE 

/NO. ERROR 

/"OUTPUT REGISTER NOT CLEARED” 
/"REGISTER DATA" 

/NUMBER OF WORDS TO BE OUTPUT 
/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TESt 

CLEARED BY INITIALIZE! 

/CLEAR ERROR FLAG 

/SET ITERATION COUNT TO 4096{DEC IMAL) 

/initialize interface 

/READ INPUT REGISTER 
/SAVE REGISTER DAfA 
/GET REGISTER DATA 
/WAS REGISTER CLEARED 
/DATA CORRECT, CONTINUE 
/NO, ERROR 

/"INPUT REGISTER NOT CLEARED” 
/"REGISTER DATA*' 

/NUMBER OF WORDS TO BE OUTPUT 
/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TEST 

AFTER INITIALIZE 

/CLEAR ERROR FLAG 

/SET ITERATION COUNT TO 4096(DEC IMAL5 

/initialize Interface 
/enable interface Interrupts . 

/TEST FOR INTERRUPT ACtlVE 

/NO interrupt, continue . 

/INTERRUPT active S ERROR 
/"INTERRUPT ACTIVE” 

/NO data HEADER 
/NO DATA 

/IS INTERFACE flag set 
/FLAG NOT SET, CONTINUE 
/FLAG SETj ERROR 
/"SKIP FLAG SET" 

/NO DATA HEADER 
/NO DATA 

/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TESt 
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/M* ,iEC"08 w OHDR A® A 


/ 

/DOES OUTPUT REGISTER 
/ 


0460 

3030 

TRANl. 

dca typflg 

0461 

3031 


DC A LPCNT 

0462 

6007 


CAF 

0463 

7340 


CLA CLL CM A 

0464 

4441 


dbro 

0465 

3021 


DCA DATA! 

0466 

1021 


TAD DAtAl 

0467 

7650 


SNA CLA 

0470 

5275 


JMP ,+5 

0471 

4 444 


JMS I XERROR 

3472 

3703 


tranie-i 

0473 

'3525 


DH2-1 

0474 

7777 



0475 

4445 


JMS I XLOOP1 

0476 

5262 


JMP TRAN1*2 

/ 

/DOES INPUT REG 
/ 

DCA TYPFLG 

0477 

3030 

f R A N 2, 

0500 

3031 


DCA LPCNT 

0501 

6007 


CAF 

3502 

7340 


CLA CLL CMA 

0503 

4436 


DBRI 

0504 

3021 


DCA DAtAl 

0505 

1021 


TAD DAtAl 

0506 

7650 


SNA CLA 

0507 

5314 


JMP ,*5 

0510 

444 4 


JMS I XERROR 

0511 

3716 


TRAN2E®! 

0512 

3525 


DH2®1 

0513 

7777 


"1 

0514 

4445 


JMS I XLQOP1 

0515 

5301 


JMP TRAN.2+2 

/ 

/DOES TRANSFER ' 
/ 

DCA TYPFLG 

0516 

3030 

TRAN3 a 

0517 

3031 


DCA LPCNT 

0520 

6007 


CAF 

0521 

7340 


CLA CLL CMA 

0522 

4 440 


DBSO 

2523 

3021 


DCA DAtAl 

0524 

1021 


TAD DAtAl 

0525 

7040 


CM A 

0526 

7650 


SNA CLA 

0 527 

5334 


JMP ,*5 

0530 

4444 


JMS I XERROR 

2531 

3731 


TRAN3E®! 

0532 

3525 


OH 2-1 

3533 

7777 


w l 

3.5.34 

4445 


JMS I XLSQP1 

2535 

5320 


JMP TR-AN3*2 


jam transfer to ac? 

/clear ERROR flag 

/SET ITERATION COUNT TO 4096 (DEC IMAL) 

/initialize Interface 

/SET AC =7777 
/READ OUTPUT REGISTER 
/SAVE AC CONTENTS 
/GET AC CONTENTS 
/WAS AC CLEARED BY TRANSFER 
/DATA CORRECTs CONTINUE 
/NO, ERROR 

/"DBRQ DID NOT CLEAR Ae» 

/»AC CONTENTS” 

/NUMBER OF WORDS TO BE- OUTPUT 
/CHECK FOR LOOP ON CURRENT - TEST 
/LOOP ON CURRENT TESt 

JAM TRANSFER. TO Ae 

/CLEAR ERROR FLAG 

/SET ITERATION COUNT TO 4096(DECJMAL> 

./INITIALIZE INTERFACE 
/SET AC =7777 
/READ INPUT REGISTER 
/SAVE AC CONTENTS 
/G£T AC CONTENTS 
/WAS AC CLEARED BY TRANSFER 
/DATA CORRECT, CONTINUE 
/N.O» ERROR 

/ !! D8R I DI D NOT CLEAR AC” 

/"AC CONTENTS” 

/NUMBER OF WORDS TO BE OUTPUT 
/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TEST 

OUTPUT REGISTER CHANGE AC (WITH AC=7777,DBSO5 

/CLEAR ERROR FLAG 

/SET ITERATION COUNT TO 4096(DECIMAL> 

/initialize Interface 

/SET AC =7777 

/SIT set output register 
/SAVE AC CONTENTS 
/GET AC CONTENTS 

/COMPLIMENT DATA TO T'ESt FOR 7777 

/■DID AC CHANGE 

/DATA CORRECT, CONTINUE 

/NO-i ERROR 

/"DBSO CHANGED AC" 

/"AC CONTENTS" 

/NUMBER OF WORDS TO BE OUTPUT 
/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TEST 
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/MAI.NDEC-08-DhDRA*A 


/ 

/DOES TRANSFER TO OUTPUT REGISTER CHANGE AC (WITH AC=7777, DBCO) 


/ 


0536 

3030 

TRAN4j 

dca 

TYPFLG 

/CLEAR ERROR FLAG 

0537 

3031 


DCA 

LPCNT 

/SET ITERATION COUNT TO 4096(DEC l MAL) 

0540 

6007 


CAF 


/initialize interface 

0541 

7340 


CLA CLL 

CMA 

/SET AC =7777 

0542 

4437 


DBCO 


/BIT CLEAR OUfPUT REGIStER 

3543 

3021 


DCA 

DAT A1 

/SAVE AC CONTENTS 

0544 

1021 


TAD 

DATA1 . 

/GET AC CONTENTS 

3545 

7040 


CMA 


/COMPLIMENT DATA to TEST FOR 7777 

0546 

7650 


SNA CLA 


/DID AC CHANGE 

0547 

5354 


JMP 

,+5 

/DATA CORRECTS CONTINUE 

0550 

4444 


JMS I . 

XERROR 

/NO » ERROR 

0551 

3741 


TRAN4E* 

1 

/”DBCO CHANGED AC” 

0552 

3525 


DH2-1 


/” AC CONTENTS” 

0553 

7777 


-1 


/NUMBER OF WORDS TO BE OUTPUT 

0554 

4445 


JMS I 

XL00P1 

/CHECK FOR LOOP ON CURRENT TEST 

0555 

5340 


JMP 

TR.AN4+2 

/LOOP ON CURRENT TESt 




/ 

/DOES TRANSFER TO 

INPUT REGISTER CHANGE AC (WITH AC = 7777 5 OB CIS 

0556 

3030 

T'RANSi 

/ 

DCA 

TYPFLG 

/CLEAR ERROR FLAG 

0557 

3031 


DCA 

LPCNT 

/SET ITERATION COUNT TO 4096 {DEC IMAL) 
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/GET TEST DATA 
/MASK OFF NON LATCHING BITS 
/SAVE AS EXPECTED RESULT 
/GET TEST DATA 
/ARE ANY BITS TO BE TESTED 
/NO s GET- NEXT DATA WORD 
/BIT SET OUTPUT REGISTER 
/BIT CLEAR OUTPUT REGISTER 

/READ. INPUT REGISTER 
/SAVE REGISTER DATA 
/GET EXPECTED RESUL'T 

/COMPARE TO RECEIVED DATA 
/ARE THEY THE SAME 
/DATA CORRECTS CONTINUE 
/NO, ERROR 
/"'LATCH ERROR'? 

/”EXPECTED RECEIVED" 

/NUMBER OF WORDS 'TO BE OUTPUT 

/test for loop on same data,escape on data error 
/LOOP WITH same data 
/INCREMENT data pattern 

/continue test 

/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TEST 


/VERIFY ALL NON LATCHING DATA BITS DO NOf HOLD DATA 


/ 


1637 

3030 

1 N6 s 

DC A- 

TYPFLG 

/CLEAR ERROR FLAG 

1640 

1177 


TAD 

C-62 

/set iteration count 

1641 

3031 


DC A 

LP.CNT 

/TO 50{DECIMAL) 

164 2 

3024 


DCA 

0ATA4 

/clear test DATA 

1643 

3022 


DCA 

DAf A2 

/CLEAR EXPECTED RESULT 

1644 

6007 

1 N6A a 

CAF 


/initialize Interface 

1645 

1027 


TAD 

F JUMPER 

/GET MASK FOR non L’AfCH-iNG BITS 

164 6 

7040 


CMA 


/CHANGE TO MASK OFF LATCHING BITS 

1647 

0024 


AND 

DAf A4 


1650 

3021 


DCA 

DAf Ai 

/save fqr Transmission 

1651 

1021 


TAD 

DATA! 

/GET TEST DATA 

1652 

7450 


SNA 


/ARE ANY BITS To BE TESTED 

1653 

5272 


JMP 

IN6C 

/NO GET NEXT DATA WORD 

1654 

4 440 


DBSO 


/BIT SET OUTPUT REGISTER 

1655 

4437 


DBCO 


/BIT CLEAR OUTPUT REGISTER 

1656 

7300 


CLA ClL 



1657 

4436 


D8RI 


/READ INPUT REGISTER 

1663 

3023 


DCA 

DA t A3 

/SAVE REGISTER DATA 

1661 

1023 


TAD 

D At A3 

/GET RECEIVED DATA 

1662 

7650 


SNA CLA 

/DID 

any bits hold data 

1663 

5270 


JMP 

»*5 

/DATA CORRECT, CONTINUE 

1664 

4 44 4 


JMS I 

XERROR 

/YES, ERROR 



1602 

3031 


DCA 

LPCNT 

1603 

3023 


DCA 

DAT A3 

1604 

6007 

I N5 A, 

CAF 


1605 

1023 


TAD 

DAT A3 

1606 

0027 


AND 

FJUMPER 

1607 

3021 


DCA 

DAT Al 

1610 

1021 


TAD 

DAf Al 

16il 

7450 


SNA 


1612 

5233 


JMP 

IN5C 

1613 

4440 


DBSO 


1614 

4437 


DBCO 


1615 

7300 


CLA CLL 


1616 

. 4436 


DBRI 


1617 

3022 


DCA 

DATA2 

1620 

1021 


TAD 

DATA! 

1621 

7041 


CIA 


1622 

1022 


TAD 

DATA2 

1623 

7>650 


SNA CLA 


1624 

5231 


JMP 

•,+s 

1625 

4444 


JMS I 

XERROR 

1626 

4026 


IN4E-1 


1627 

3560 


DH4-1 


1630 

7776 


-2 


1631 

4446 


JMS I 

XL00P2 

1632 

5204 


JMP 

IN5 A 

1633 

2023 

I-N5C, 

ISZ 

DATA3 

1634 

5204 


JMP 

IN5A 

1635 

4445 


JMS I 

XLOQPi 

1636 

5203 


JMP 

IN54-3 


/ 




# 
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1665 

4026 


IN4E-1 


1666 

3534 


DH3-1 


1667 

7775 


-3 


1670 

4446 


JMS I 

XL00P2 

1671 

5244 


JMP 

IN6A 

1672 

2024 

I N6C, 

ISZ 

DATA4 

1673 

5244 


JMP 

IN6 A 

1674 

4445 


JMS I 

XLOOP1 

1675 

5242 


JMP 

IN6+3 


/ ” L A T C H ERROR” 

/’•MASK EXPECTED' RECEIVED" 

/NUMBER of words to be output 

/TEST FOR LOOP ON same DATAiESCAPE on data ERROR 
/LOOP WITH SAME DATA 
/INCREMENT data pattern 
/continue test 

/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON current TEST 


/VERIFY 
/ 


THAT ALL LATCHING LINES CAN BE CLEARED INDEPENDENTLY 


1676 

3030 

I-N7, 

DCA 

TYPFLG 

/CLEAR ERROR FLAG 

1677 

1177 


TAD 

[*62 

/SET ITERATION'COUNT 

1700 

3031 


DCA 

LPCNT 

/TO 50{DEC!MAL) 

1701 

3024 


DCA 

DAT A4 

/CLEAR TEST 

1702 

6007 

IN 7 A, 

CAF 


/INITIALIZE INTERFACE 

1703 

1027 


TAD 

F JUMPER 

/GET MASK F0.R LATCHING BITS 

1704 

0024 


AND 

DATA4 

/MASK OFF NON LATCHING BITS 

1705 

3021 


DCA 

DATA! 

/SAVE FOR TRANSMISSION 

1706 

3022 


DCA 

DAT A2 

/EXPECTED RESULT 

1707 

1021 


TAD 

DATA1 

/SET OUTPUT REGISTER=7777 

1710 

4440 


DBSO 


/BIT SET OUTPUT REGISTER 

1711 

4437 


DBCO 


/BIT CLEAR OUTPUT REGISTER 

1712 

7300 


c-CLA CLL 



1713 

1021 


TAD 

DAT A1 

/GET TEST DATA ' 

1714 

4435 


DBCI 


/BIT CLEAR INPUT REGISTER 

1715 

7300 


CLA CLL 



1716 

4436 


DBRI 


/READ INPUT REGISTER 

1717 

3023 


DCA 

DAt A3 

/SAVE REGISTER DATA 

1720 

1023 


TAD 

D At A3 

/COMPARE TO RECEIVED DATA 

1721 

7650 


SNA CLA 


/ARE THEY THE SAME 

1722 

5327 


JMP 

t ^5 

/DATA CORRECT, CONTINUE 

1723 

4444 


JMS I 

XERROR 

/NO, ERROR 

1724 

4026 


IN4E-1 


/"LATCH ERROR” 

1725 

3534 


DH3-1 


/"MASK EXPECTED RECEIVED" 

1726 

7775 


o 3 


/NUMBER OF WORDS TO BE- OUfP 

1727' 

4446 


JMS I 

XLOOP2 

/TEST FOR LOOP ON SAME DATA 

1730 

5302 


JMP 

l M7 A 

/LOOP WITH SAME DATA 

1731 

2024 

I N7C „ 

ISZ 

DATA4 

/INCREMENT DATA PATTERN 

1732 

5302 


JMP 

I N7 A 

/continue test • 

1733 

4445 


JMS I 

XLOOP1 

/CHECK FOR LOOP ON CURRENT 

1734 

5301 


JMP 

IN7*3 

/LOOP ON CURRENT TESt 

1735 

5177 * 


JMP 

INS 

/GO TO NEXT TEST 

1777 

2000 






2000 

PAGE 





/ 

/WITH THE INPUT REGISTER CLEARED * DOES CLEARING 
/THE INPUT REGISTER SET ANY BJT IN INPUT 
/ 

2000 3030 IN'S, DCA TYPFLG /CLEAR ERROR FL'A-G 

2001 1177 TAD C-62 /SET ITERATION COUNT 
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2002 

3031 


DCA 

LPCNT 

2003 

3021 


DC A 

DAfA! 

2004 

3022 


DCA 

DAT A2 

2005 

6007 

I NS A, 

CAF 


2006 

1021 


TAD 

DAtAl 

2007 

4435 


DBCI 


2010 

7330 


CLA CLL 


20 ii 

4 436 


DBRI 


2012 

3023 


DCA 

DAf A3 

2013 

1023 


TAD 

DAT A3 

2014 

7650 


SNA CLA 


2015 

5222 


JMP 

t *5 

2016 

4444 


JMS I 

XERROR 

2017 

4003 


1N2E-X 


2020 

3534 


DH3-1. 


2021 

7775 


*3 


2022 

4446 


JMS I 

XLQ0P2 

2023 

5235 


JMP 

IN8 A 

2024 

2021 


ISZ 

DAf A1 

2025 

5205 


JMP 

IN8A 

2026 

4445 


JMS I 

XLQGP1 

2027 

5203 


JMP 

I N8*3 




/ 

/DOES reading the 




/CHANGE 

THE INPUT 

2030 

3030 

IN9, 

DCA 

TYPFLG 

2031 

1177 


TAD 

,C«62 

2032 

3031 


OCA 

LPCNT 

2033 

3021 


DCA 

DATA! 

2034 

6007 

IN9A, 

CAF 


2035 

1321 


TAD 

DAtAl 

2036 

4440 


DBSO 


2037 

7300 


CLA CLL 


2040 

4436 


DSRI 


2041 

7300 


CLA CLL 


2042 

4436 


DBR I 


2043 

3022 


DCA 

DAf A2 

2044 

1021 


TAD 

DAtAl 

2045 ' 

' 7041 


CIA 


2046 

1022 


TAD 

DAf A2 

2047 

7650 


SNA CLA 


2050 

5255 


JMP 

c *5 

2051 

4444 


JMS I 

XERROR 

2052 

4034 


IN9E-1 


2053 

3560 


DH4®1 


2054 

7776 


ei 2 


2055 

4446 


JMS I 

XLQGP2 

2@56 

5234 


JMP 

IN9A 

2057 

2 Sil 


ISZ 

DAT A1 

2060 

5234 


JMP 

I N9 A 

2361 

4445 


JMS I 

XLQOP1 

2062 

5233 


JMP 

IN9*3 


/TO 50 (DECIMAL') 

/CLEAR TEST DATA 
/CLEAR EXPECTED RESULT 
/INITIALIZE INTERFACE 
/GET TEST DATA 
/BIT CLEAR INPUT REGISTER 

/READ INPUT REGISTER 
/SAVE REGISTER DAfA 
/GET REGISTER DATA 
/IS INPUT REGISTER 0 
/DATA CORRECT, CONTINUE 
/NO, ERROR 
/’»DBCI ERROR” 

/"MASK EXPECTED RECEIVED” 
/NUMBER OF DATA WORDS 

/test for Loop wits same data 

/LOOP WITH SAME DATA 
/INCREMENT DATA PATTERN 
/CONTINUE 

/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TEST 


input register TWICE 
REGISTER 

/CLEAR ERROR FLAG 
/SET ITERATION COUNT 
/TO 50 (DECIMAL) 

/CLEAR TEST DATA 
/INITIALIZE INTERFACE 
/GET TEST DATA 
/BIT SET OUTPUT REGISTER 

/read input register 

/READ INPUT REGISTER 
/SAVE REGISTER DATA 
/GET TEST DAfA 

/COMPARE TO REGISTER DATA 
/ARE THEY THE SAME 
/DATA CORRECTS CONTINUE 
/NO, ERROR 
/ !? DBR I ERROR” 

/s?EXPECTED RECEIVED" 

/NUMBER OF DAT WORDS 

/test fqr loop wiffi same data 

/LOOP WITH SAME DATA 
/INCREMENT DATA PATTERN 
/CONTINUE 

/CHECK FOR LOOP ON CURRENT TEST 
/LOOP ON CURRENT TEST 
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/ 

/DOES CLEARING INPUT REGISTER TWICE SEf AN? BIT 
/IN INPUT REGISTER 


/ 


2063 

3030 

i Ni0. 

DC A 

TYPFLG 

/CLEAR error flag 

2064 

1177 


TAD 

C*62 

/SET ITERATION COUNT 

2065 

3031 


DCA 

LPCNT 

/TO 50 (DECIMALS 

2066 

3022 


DC A 

DAf A2 

/CLEAR EXPECTED RESULT 

2067 

3021 


DCA 

DAf A1 

/CLEAR TEST DAfA 

2070 

6007 

IN10A, 

CAF 


/INITIALIZE Interface 

2071 

1021 


TAD 

DAT A1 

/GET TEST SAfA 

2072 

4440 


DBSO 


/BIT SET OUTPUT REGISTER 

2073 

4437 


DBCO 


/BIT CLEAR OUTPUT REGISTER 

2074 

4435 


DBG I 


/BIT CLEAR INPUT REGISTER 

2075 

4435 


DBG I 


/BIT' CLEAR INPUT REGISTER 

2076 

7300 


CLA CLL 



2077 

4436 


DBRI 


/READ INPUT REGISTER 

2100 

3023 


DCA 

DAf AS 

/SAVE REGISTER DATA 

2101 

1023 


TAD 

DAf A3 

/GET REGISTER DATA 

2102 

7650 


SNA CLA 


/IS INPUT REGISTER 0 

2103 

5310 


JMP 

t *5 

/DATA CORRECT, CONTINUE 

2104 

4444 


JMS I 

XERROR 

/NO, ERROR 

2105 

4003 


IN2E-1 


/«OBCJ ERROR" 

2106 

3534 


DH3-1 


/ !f MASK EXPECTED RECEIVED” 

2107 

77f5 


.3 


/NUMBER OF DATA WORDS 

2110 

4446 


JMS I 

XL0OP2 

/test for Loop with same d 

2111 

5270 


JMP 

IN10A 

/LOOP WITH SAME DAfA 

2112 

2021 


IS2 

DATA1 

/INCREMENT DATA PAfTERN 

2113 

5270 


JMP 

IN10A 

/CONTINUE 

2li4 

4445 


JMS I 

XLOQP1 

/CHECK FOR LOOP ON CURRENT 

2115 

5266 


JMP 

IN10*3 

/LOOP ON CURRENT TEST 

2116 

5777' 


JMP 

INOUi 

/GO TO NEXT TEST 

2177 

2200 






2200 

PAGE 





/ 

/WITH BOTH INPUT AND OUTPUT REGISTERS CLEARED 
/DOES CLEARING OUTPUT SET 
/ANY BIT IN INPUT 

/ 


2200 

3030 

INOUi a 

DCA 

TYPFLG 

/CLEAR ERROR FLAG 

2201 

1177 


TAD 


/SET ITERATION COUNT 

2202 

3031 


DCA 

LPSNT 

/TO 5® (DECIMAL) 

2203 

3021 


DCA 

DAf A1 

/CLEAR TEST DATA 

2204 

3022 


DCA 

DAT A2 

/CLEAR EXPECTEB RESULT 

2205 

6007 

1 NOUiA, 

CAF 


/INITIALIZE INTERFACE 

2206 

1021 


TAD 

DAf A1 

/GET TEST SAfA 

2207 

4437 


DBCO 


/BIT CLEAR OUTPUT REGZ 

2210 

7300 


CLA GU 



2211 

4436 


DBR I 


/READ INPUT REGISTER 

2212 

3023 


DCA 

DAf A3 

/SAVE REGISTER DATA 

2213 

1023 


TAD 

DAf A3 

/GET REGISTER 0AYA 

2214 

7650 


SNA CLA 


/IS OUTPUT REGISTER 0 

2215 

5222 


JMP 

8 &5 

/DATA CORRECT« CONfZNU 

2216 

4444 


JMS I 

XERROR 

/NO, ERROR 
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2217 

3767 


0UT4E 

®1 



/ ” P B G 0 ERROR" 

2220 

3534 


DH3»1 




/’’MASK EXPECTED RECEIVED” 

2221 

77t5 


© 3 




/NUMBER OF DATA WORDS 

2222 

4446 


JMS I 


XL0QP2 


/test for Loop w ff h same data 

2223 

5205 


JMP 


IN0U1A 


/loop with same data 

2224 

2021 


ISZ 


DAf Ai 


/increment data pattern 

2225 

5205 


JMP 


INQUiA 


/CONTINUE 

2226 

4445 


JMS I 


XLSQP1 


/CHECK FOR LOOP ON CURRENT TEST 

2227 

5203 


JMP 


IN0U1*3 


/LOOP ON CURRENT TEST 




/ 

/WITH 

BOTH INPUT 

and 

OUTPUT REGISTERS CLEARED 




/DOES 

CLEARING INPUT 

SET ANY BIT IN OUTPUT 

2230 

3030 

IN 0 U 2 a 

DCA 


TYPFLG 


/CLEAR ERROR FLAG 

2231 

1177 


TAD 


E®62 


/SET ITERATION COUNT 

2232 

3031 


DCA 


LPCNT 


/TO 50 (DECIMAL) 

2233 

3021 


DCA 


DAf Al 


/CLEAR TEST DATA 

2234 

3022 


DCA 


DAf A2 


/CLEAR EXPECTED RESULT 

2235 

6007 

!NSU2A a 

CAP 




/initialize Interface 

2236 

1021 


TAD 


DAf Al 


/GET TEST DATA 

2237 

4435 


DBG I 




/BIT CLEAR INPUT REGISTER 

2240 

7300 


cu cu 




2241 

4441 


DBRO 




/READ OUTPUT REGISTER 

2242 

3023 


DCA 


DAT AS 


/SAVE REGISTER DATA 

2243 

1023 


TAD 


DAf A3 


/GET REGISTER &AfA 

2244 

7650 


SNA CIA 



/IS OUTPUT REGISTER 0 

2245 

5252 


JMP 


, *5 


/DATA SORRECfa CONTINUE 

2246 

4444 


JMS I 


XERROR 


/NO } ERROR 

2247 

4003 


IN2E- 

1 



/”D8CI ERROR” 

2250 

3534 


D H 3 o 1 




/’’mask expected received” 

2251 

7775 


13 3 




/NUMBER of DA?AA WORDS 

2252 

4446 


JMS I 


XL Q 0 P 2 


/test for Loop with current data 

2253 

5235 


JMP 


IN0U2A 


/LOOP WITH SAME DAfA 

2254 

2021 


ISZ 


DAT Al 


/increment data PATTERN 

2255 

5235 


JMP 


IN0U2A 


/CONTINUE 

2256 

4445 


• JMS 1 


XL00P1 


/CHECK FOR LOOP ON CURRENT TEST 

2257 

5233 


JMP 


IN0U2+3 


/LOOP ON CORRENf TEST 




£ 

/WITH 

THE OUTPUT 

register set to aLl is* and 




/THE 

INPUT register 

cleared, does selectively 




/CLEARING tHE OUTPUT 

REGISTER SET ANY BIT IN 




/THE 

INPUT REGISTER 


2260 

3030 

I NSU3fl 

DCA 


TYPFLG 


/CLEAR ERROR FLAG 

2261 

1177 


TAD 




/SET ITERATION COUNT 

2262 

3031 


DCA 


LPCNT 


/TO 50 (DECIMAL) 

2263 

3021 


DCA 


DAf Al 


/CLEAR TEST DATA 

§264 

3022 


SSA 


DAT A2 


/CLEAR EXACTED RESULT 

2265 

6007 

INQU3A s 

CAF 




/INITIALIZE-INTERFACE 

2266 

7040 


CMA 




/SET A0§7777 

2267 

4440 


DBSO 




/BIT SET OUTPUT REGISTER 

227S 

4 435 


DBG I 




/BIT CLEAR INPUT REGISTER 

2271 

73S0 


CIA CU, 




2272 

1027 


TAD 


F.JUMPER 


/GET FLIPFLOP ‘JUMPER MASK 



2273 

2274 

2275 

2276 

2277 

2300 

2301 

2302 

2303 

2304 

2305 

2306 

2307 

2310 

2311 

2312 

2313 

2314 

2315 

2316 

2317 

2320 

2321 

2322 

2323 

2324 


2325 

2326 

2327 

2330 

2331 

2332 

2333 

2334 

2335 

2336 

2337 

2340 

2341 

2342 

2343 

2344 

2345 

2346 

2347 

2350 

2351 

2352 

2353 
2.354 


7040 

CMA 



3022 

DCA 

DAT A2 


1021 

TAD 

DAT A1 

/GET TEST DATA2 

7040 

CMA 


/COMPLEMENT 

0022 

AND 

DAf A2 

/AND WITN COMPLEMENT OF JUMPER MASK 

3022 

DCA 

DAfA2 

/TO GET EXPECTED RESULT 

1021 

TAD 

DAT A1 

/GET TEST DAfA 

4437 

DBCQ 


/BIT CLEAR OUTPUT REGISTER 

7300 

CLA CLL 



4436 

DBR I 


/READ INPUT REGISTER 

3023 

DCA 

DAf A3 

/SAVE REGISTER DATA 

1023 

TAD 

DATA3 

/GET REGISTER DAfA 

7041 

CIA 



1022 

TAD 

DAf A2 

/COMPARE YD EXPECTED RESULT 

7650 

SNA CU 


/are they the same 

5317 

JMP 

t *5 

/DATA CORRECTi CONTINUE 

4444 

JMS I 

XERROR 

/NOa ERROR 

3767 

0UT4E"! 


/”DBCO ERROR” 

3534 

DHSrai 


/”MASK EXPECTED RECEIVED 

7775 

-3 


/NUMBER OF DATA WORDS 

4446 

JMS I 

XL0QP2 

/TEST FOR LOOP WITH SAME DATA 

5265 

• JMP 

IN0U3A 

/LOOP WITH SAME DATA 

2021 

ISZ 

DAT A1 

/increment data pattern 

5265 

JMP 

INQU3A 

/CONTINUE 

4445 

JMS I 

XLOOP1 

/CHECK FOR LOOP ON CURRENT TEST 

5263 

JMP 

INCUSES 

/LOOP ON CURRENT TEST 


/WITH THE INPUT REGISTER SET TO ALL! IS, DOES SELECTIVELY 


/CLEAR!! 

NG fHE OUTPUT REGISTER CLEAR ANY BITS IN THE INPUT 


/REGISTER (EXCEPT 

THOSE NOT FLIPFL0PS) 

3030 

IN0U4 a DCA 

TYPFLG 

/clear error flag 

1177 

TAD 

C ®62 

/SET ITERATION COUNT 

3031 

DCA 

LPCNT 

/TO 50 (DECIMAL) 

3021 

DCA 

DAf Al 

/CLEAR TEST DATA 

6007 

lN9U4As CAF 


/INITIALISE INTERFACE 

7040 

CMA 


/SET AC TO 7777 

4440 

D8SQ 


/BIT SET OOfPUT REGISTER 

7300 

CLA CLL 



1027 

TAD 

F JUMPER 

/GET FLIPFLOP JUMPER MASK 

7040 

CMA 



0021 

AND 

DAf Al 

/COMBINE WITH MASK 

7040 

CMA 



3022 

DCA 

DAf A2 

/TO GET EXPECTED RESULT 

1021 

TAD 

DAf Al 

/GET TEST DATA 

4437 

DBCQ 


/BIT CLEAR OUTPUT REGISTER 

7300 

CLA CLL 



4436 

DBR I 


/READ INPUT REGISTER 

3023 

DCA 

DAf AS 

/SAVE REGISTER DAfA 

1022 

TAD 

DAf A2 

/GET EXPECTED RESULT 

7041 

CIA 



1023 

TAD 

DAf A3 

/COMPARE TO RECEIVED DAfA 

7650 

SNA CLA 


/are they The same 

5360 

JMP 

,*5 

/DATA CORRECT * CONTINUE 

4444 

JMS 1 

XERROR 

/ N Q *• ERROR 
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/HAINDECsSS^DHDRA^A 


2355 

2356 

2357 

3767 

3534 

7775 


OUT 4E°i 

DH3®1 

»3 


/”DBCO ERROR’ 9 

/’’MASK EXPECfED RECEIVED" 

/NUMBER OF DAfA WORDS 

2360 

4446 


JMS I 

XL00P2 

/TEST FOR L'OOP WITH CURRENT DATA 

2361 

5331 


JMP 

IN0U4A 

/LOOP WITH SAME DATA 

2362 

2021 


IS2 

DAT A1 

/increment data pattern 

2363 

5331 


JMP 

IN0U4A 

/CONTINUE 

2364 

4445 


JMS I 

XLOQP1 

/CHECK FOR LOOP ON CURRENT TEST 

2365 

5330 


JMP 

IN0U4*3 

/LOOP ON CURRENT TEST 

2366 

2377 

5777' 

2400 

2400 

PAGE 

JMP 

I Nf 1 

/GO TO NEXT TEST 


/ 

/VERIFY THAT EACH BIT SET UP TO SR IP DOES 


/ 


2400 

3030 

INTI, 

DCA 

typflg 

/CLEAR ERROR FLAG 

2401 

1177 

TAD 

C®62 

/SET ITERATION COUNT 

2402 

3031 


DCA 

LPONT 

/TO 50 C DECIMAL ) 

2403 

3022 


DCA 

DAT A2 

/initialize interface 

2404 

6007 

iNTlAe 

OAF 


2405 

1022 


TAD 

D At A2 


2406 

0026 


AND 

I JUMPER 


2407 

7450 


SNA 

INflD 


2410 

5241 


JMP 


2411 

3021 


DCA 

DAT A1 

/SAVE test data 

24i2 

1021 


TAD 

DAT A1 


2413 

4440 


DBSO 


/BIT SET OUTPUT REGISTER 

2414 

7300 


CLA Cll 


/is interrupt ACTIVE 

2415 

6003 


SRQ 


245.6 

5223 


JMP 

5 $5 

XERROR 

/NOj CONTINUE 

245,7 

4444 


JMS 1 

/YESj ERROR 

2420 

4042 


INTIE®! 


/INTERRUPT ACTIVE 

2421 

3515 


DHi-1 



2422 

7777 


-1 


/NUMBER OF DAfA WORDS TO BE. OUTPUT 

2423 

4433 


D8EI 


/enable INTERFACE 

2424 

6003 


SRQ 


/is interrupt ACTIVE 

2423 

5231 


JMP 

INT1AE 

/NSa ERROR 

2426 

4434 


DBSK 


/IS FLAG Sfef 

2427 

5246 


JMP 

INfIB E 

/NO * ERROR 

2430 

5237 


JMP 

INflOK 

/INTERRUPT ACTIVE* FLAG SE? 

2431 

4434 

1NT1AE o 

DBSK 


/IS INTERFACE FLAG SET 

2432 

5253 


JMP 

INflCE 


2433 

4444 


JMS I 

XERROR 

/NSa ERROR 

2434 

4042 


IN?1E®1 



2435 

3515 


DH1®1 


/NUMBER OF WORDS TO BE OUTPUT 

2436 

777 7 


®i 


2437 

4446 

!NtlGK a 

JMS I 

XL0QP2 

/TEST FOR L'OOP ON SAME DATA e ESCAPE ON DATA ERROR 

2440 

5204 


JMP 

I Nf 1A 

/LOOP WITH SAME DAfA 

2441 

2022 

1NTlbs 

ISZ 

DAT A2 

/increment data PATTERN 

2442 

5204 


JMP 

X Nf 1A 

/CONTINUE 

2443 

4445 


JMS I 

XLOOPi 

/CHECK FOR LOOP ON CURRENT TEST 

2444 

5203 


JMP 

INT1*3 

/LOOP ON CURRENf TEST 

2445 

5260 


JMP 

X Nf 3 

/GO TO NEXT TESf 


PAL10 V141 


29-MAR-7.2 


./N D^C» 08 ®Dh 6 RAbA 


2-446 

4444 

1NT1BE, 

JMS I 

XERROR 

2447 

4065 


INT3E-1 


2450 

3515 


DH1-1 


2451 

7777 


■*1 


2452 

5237 


JMP 

INTIOK 

2453 

4444 

INT1CE, 

JMS I 

XERROR 

2454 

4077 


INT4E-1 


2455 

3515 


DH1-1 


2456 

7777 


"l 

INflOK 

2457 

5237 


JMP 




/ 

/VERIFY 

/ 

D-C-A 

THAT EACH BI 

2460 

3030 

INY3, 

TYPFLG 

2461 

1177 


TAD 

1*62 

2462 

3031 


DC A 

LPCNT 

2463 

3022 


DCA 

DAf A2 

2464 

6007 

I NT3A a 

CAF 


2465 

1026 


TAD 

I JUMPER 

2466 

7040 


CMA 


2467 

0022 


A*NB - 

DAf A2 

2470 

7450 


SNA 

INT3C 

2471 

5306 


JMP 

-2472 

3021 


DCA 

DATA! 

2473 

1021 


TAD 

DAfAl 

247-4 

4440 


DBSO 


2475 

7300 


CLA CLL 


2476 

4434 


D-B-SK 


2477 

5304 


JMP 

a *5 

2500 

4 444 


JMS I 

XERROR 

2501 

3674 


INI T3£<* 

1 

2502 

3515 


DH4-1 

/»RE 

2503 

7777 




2504 

4446 


JMS ! 

XL0OP2 

2505 

5264 


JMP 

INT3A 

2506 

2022 

jNTSC a 

I SI 

DAT A2 

2507 

5264 


JMP 

INT3A 

2510 

4445 


JMS I 

XLeO-Pl 

2511 

5263 


JMP 

TNT3*3 

2512 

5777' 


JMP 

E'PASS 




/ 

/ERROR 

J 

handler 

2577 

3257 





2600 

PAGE 



2600 

0000 

ERRQRa 

0 


2601 

7300 


C.U CLL 


2602 

1600 


TAD I 

ERROR 

■2603 

3234 


DCA 

MESG 

2604 

2200 


IS2 

ERROR 

.2605 

1600 


TAD I 

ERROR 

2606 

3236 


DCA 

DHDER 

2607 

2200 


132 

ERROR 


_>6j07 PAGE 1-21 
/NO* ERROR 


/NUMBER OF WORDS TO BE OUTPUT 
/NO# ERROR 


/number of words fe be output 


not JUMPERD TO SKIP DOES NOT 

/CLEAR £RR0R FUG 
/SET ITERATION COUNT 
/TO 50 (DECIMAL:) 

/CLEAR TEST DATA 
/INITIALISE INTERFACE 
/GET JUMPER MASK 
/compliment FOR NO skip bits 
/GET BITS TO BE TESTED 
/ARE ANY BITS fO BE TEStEQ 
/NOa GIT NEXT DAtA PATTERN 
/SAVE FOR OUTPUT 
/GET TEST BATA 
/BIT SET OUTPUT REGISTER 

/IS flag SET 
/NO# CONTINUE 
/YES 5 ERROR 
/’’SKIP FLAG SET” 

I STEP. DAW 


/SET POINTER ?0 ERROR MESSAGE 
/SAVE POINTER 

/GET POINTER TO DATA HEADER 
/SAVE HEADER 

/NUMBER OF WORDS TO BE OUTPUT 



/MAINDE 

C«08'»DH6rA®A 

PAL10 

V141 

2610 

1600 


TAD I 

ERROR 

2611 

3264 


DCA 

DAfCNT 

2612 

1200 


TAD 

ERROR 

2613 

1377 


TAD 

(«3 

2614 

3776' 


DCA 

LSTDGf 

2615 

1776' 


TAD 

LSTDSf 

2616 

3266 


DCA 

ERRAD 

2617 

7604 


LAS 

SR@1 

2620 

0334 


AND 

2621 

7640 


S2A CU 

EHALT 

2622 

5254 


JMP 

2623 

1030 


TAD 

TYPFLG 

2624 

7640 


S2A CIA 


2625 

5-241 


JMP 

DAfOUT 

2626 

7040 


CMA 


2627 

3030 


DCA 

TYPFLG 

2630 

4775' 


JMS 

OCTASS 

2631 

4442 


JMS I 

XPRINf 

2632 

3024 


ERADR®i 


2633 

4442 


JMS I 

KPRINf 

2634 

0000 

MESG, 

0 


2635 

4442 


JMS I 

XPRINT 

2636 

0000 

DHDERa 

0 


2637 

4442 


JMS I 

XPRINf 

2640 

3512 


CRLF-1 


2641 

1264 

DATOUT a 

TAD 

DAfCNT 

2642 

7650 


SNA CU 

EHALT 

2643 

5254 


JMP 

2644 

1265 


TAD 

DAT AP 

2645 

3010 


DCA 

POINT! 

2646 

1410 

BITS, 

TAD I 

POINT! 

2647 

4774' 


JMS 

BI TOUT 

2653 

2264 


IS2 

DAfCNT 

2651 

5246 


JMP 

BITS 

2652 

4442 


JMS I 

XPRINf 

2653 

3512 


CRLF-1 


2654 

7604 

EHALfa 

LAS 


2655 

0333 


AND 

SR00 

2656 

7640 


SI A CU 


2657 

5262 


JMP 

, *3 

26 6-0-- 

1266 


TAD 

ERRAD 

2661 

7402 


HLJ 


2662 

2200 


ISZ 

ERROR 

2663 

5600 


JMP 1 

ERROR 

2664 

000® 

DATGNY a 

0 


2665 

0020 

DATAPa 

DATA!®! 


2666 

3000 

ERRADe 

0 

/ 

/TEST Ft 
£ 

3R LOOP 

2667 

0000 

LOOP!a 

f 

0 


2670 

1030 


TAD 

TYPFLG 

2671 

7650 


SNA CIA 


2672 

5277 


JMP 

LP1EXA 

2673 

7604 


LAS 



29bMAR®72 16107 PAGE 1«22 

/GET NUMBER OF DAfA WORDS TO BE TYPED 
/SAVE 

/GET ADDRESS QP TEST THAT FAILED 


/CLEAR ERROR FLU'S 


/NUMBER OF WORDS TO BE OUTPUT 


CURRENT TEST 


'J J 



DEC”0S®DH8RA®A 


PAL10 V141 


29®HAR=72 


107 


2674 

0341 


AND SR06 

2675 

7640 


SHA CUA 

2676 

5310 


JMP LP1EXX-1 

2677 

7604 

LPiEXA« 

LAS 

2700 

0340 


AND SR05 

2701 

7640 


SEA CU 

2702 

5305 


JMP LPlEXf 

2703 

2031 


ISZ LPCNT 

2704 

5311 


JMP LPIEXX 

2705 

7604 

LP1EXT, 

LAS 

2706 

0335 


AND SR02 

2707 

7650 


SNA CIA 

2710 

2267 


ISZ LOGP1 

2711 

5667 

lpiexx 8 

JMP I LO0P1 

2712 

0000 

LOOP?* 

y 

/TEST FOR LOOP ON 
/ 

0 

2713 

1030 


TAD YYPFLS 

2714 

7650 


SNA CU 

2715 

5326 


JMP LP2EXT 

2716 

7604 


LAS 

2717 

0341 


AND SR06 

2720 

7650 


SNA CIA 

2721 

5326 


JMP ,+S 

2722 

1312 


TAD L00P2 

2723 

1373 


TAD (5 

2724 

3312 


DCA L0QP2 

2725 

5712 


JMP l L08F2 

2726 

7604 

LP2EXT* 

LAS 

2727 

0336 


AND SR03 

2730 

7650 


SNA CU 

2731 

2312 


ISZ L00P2 

2732 

5712 


JMP I LOOPS 

2733 

4000 

SR00t 

4000 

2734 

2000 

SR®1 j 

2000 

2735 

1000 

SR02, 

1000 

2736 

0400 

SR03, 

40® 

27 37 

0200 

SR04, 

200 

2740 

0100 

SR05, 

100 

2741 

0040 

SR06, 

40 

2773 

2774 

2775 

2776 

2777 

0005 

30S1 

3000 

3027 

7775 

3000 

PAGE 

/ 

/OCTAL TQ PACKED 

/ 

3300 

0000 

OCfASSa 

0 

3001 

7300 


CLA CLL 

3002 

1227 


TAD ISfOGf 

3003 

7002 


BSW 


CURRENT DATA 


/DATA CORRECTi 


PAGE 1*23 


conT imt 


l CONVERTED 
SEPARATE DIGITS* 



^NDEC 

!»08®DHDRA®A 

PAU0 

viii 

2?»MAR 

®72 16i0 7 PAGE 1^24 

3004 

4212 


JMS 

SPLIT 


/CONVERT most significant 

3005 

3226 


DCA 

MSfDGT 


/DIGITS TO ASCII 

3006 

1227 


TAD 

LSfDGT 


/CONVERT LEAST SIGNIFICANT 

3007 

4212 


JMS 

split 


/DIGITS TO ASCII 

3010 

3227 


DCA 

LSTDGf 



3011 

5600 


JMP I 

OCfASD 


/RETURN 

3012 

0000 

SPLIT* 

0 




30i3 

0377 


and 

(77 



3014 

7421 


MQL 




3015 

7501 


MQA 




30i6 

7106 


CLL RTL 




30i7 

7004 


RAL 




3020 

0376 


AND 

(707 



3021 

7501 


MQA 




3022 

0376 


AND 

(707 



3023 

1375 


TAD 

(6060 



3024 

5612 


JMP I 

SPLIT 



3025 

3736 

eradr, 

TEXT 

/*»♦ 

/ 


3026 

4040 






3027 

4040 






3030 

4000 









/OUTPUT 

t 

12 Bit 

BINARY 

WORD 

3031 

0000 

BI TOUT s 

/ 

0 




3032 

7421 


MQL 



/SAVE DATA IN MQ 

3033 

1374 


TAD 

(®14 


/SET UP TO OURPUf 

3034 

3020 


DCA 

CNTR1 


/12 BITS 

3035 

7501 

BJ T0i, 

MQA 



/GET DATA 

3036 

7104 


CLL RAL 



/GET MSB INTO LINK 

3037 

7421 


MQL 



/SAVE REST OF WORD 

3040 

1373 


TAD 

("I 


/GET ASCII 1 INTO AC 

‘ 3041 

7420 


SNL 




3042 

0372 


and 

("0 


/IS BIT=l 

3043 

4443 


JMS I 

XfYPE 


/NO, CHANGE TO ASCII 0 

3044 

2020 


JS2 

CNtRl 


/OUTPUT BIT 

3045 

5235 


JMP 

B I f 01 


/continue 

3046 

1371 


TAD 

(240 


/TYPE 2 SPACES 

3047 

4443 


JMS I 

XfYPE 


/AFTER LAST Bit HAS BEEN 

3050 

1371 


TAD 

(240 


/OUTPUTTED 

3051 

4443 


JMS I 

XfYPE 



3052 

5631 


JMP I 

BITOUf 


/RETURN 


/ 

/CHARACTER STRING OUTPUT ROUTINE 


3171 

0240 


3172 

0260 


3173 

0261 


3174 

7764 


3175 

6060 


3176 

0707 


3177 

0077 



3200 

PAGE / 

3200 

0000 

PRINT, 0 



( 


_,/ndec 

;b08oDHDRA ra A 

PALIS 

V141 

29®MAR°72 107 PAGE 1®25 

3201 

7300 

CIA CLl 



3202 

1600 

TAD I 

PRINT 

/GET POINTER fO MESSAGE 

3203 

3010 

DCA 

POINT! 

/SET UP AUfOoINDEX REGISTER 

3204 

2200 

ISZ 

PRINT 

/SET UP RETURN 

3205 

1410 

TAD I 

POlNTl 

/GET PACKED WORD 

3206 

7421 

MQL 


/SAVE IN M8 

3207 

7501 

MSA 


/GET WORD 

32i0 

7002 

BSW 


/SWAP HALVES 

3211 

4215 

JMS 

TYPSET 

/DECODE AND OUTPUT 

3212 

7501 

MQA 


/GET WORD 

3213 

4215 

JMS 

TYPSET 

/DECODE AND OUTPUT 

3214 

5205 

JMP 

PR!NT*5 

/CONTINUE 



/unpack 

f DECODEj 

OUTPUT 


3215 

0000 

TYPSET 5 

/ 

0 




3216 

0243 


AND 


K0077 

/MASK UNWANTED BITS 

3217 

7450 


SNA 



/IS AC®0 

3220 

5600 


JMP 

I 

PRINT 

/YES, END 0F MESSAGE, EXIT 

3221 

1244 


TAD 


M40 

/SUBTRACT 40 

3222 

7510 


SPA 



/IS PACKED CHARACTER >40 

3223 

5226 


JMP 


, *3 

/NO 

3224 

1250 


TAD 


K240 

/YES 3 CONVERT TO ASCII 

3225 

5241 


JMP 


MfP 

/OUTPUT 

3226 

7001 


I AC 



/ADD 1 TO AC 

3227 

7440 


S1A 



/IS CHARACTERS? 

3230 

5253 


JMP 


,*3 

/NO, 

3231 

1245 


tab 


K215 

-/GET CODE FOR CARRIAGE RETURN 

3232 

5241 


JMP 


MTP 

/OUTPUT 

3233 

7001 


IAC 



/ADD 1 TO AC 

•3'234 

7440 


Si A 



/IS CHARACTERS? 

3235 

5240 


JMP 


8 *3 

/NS 

3236 

1246 


TAD 


K212 

/GET CODE FOR LINE FEED 

3237 

5241 


JMP 


MTP 

/OUTPUT 

3240 

1247 


TAD 


K336 

/PACKED CHARACTER >40, CONVERT TO ASCI! 

3241 

4443 

htp s 

JMS 

I 

XTYPE 

/OUTPUT 

3242 

5615 


JMP 

I 

TYPSET 


3243 

0077 

K0077 5 

77 




.3244 

7740 

M40, 

S3 4 0 




3245 

0215 

K215 f 

215 




3246 

0212 

K212, 

212 




3247 

0336 

K336 „ 

336 




3250 

0240 

K240, 

240 

/ 

/OUT 

i 

’PUT 

ONE CHARACTER 

TO TTY 

3231 

0000 

Type* 

/ 

0 




3252 

6046 


Ti’S 




3253 

6041 


TSF 


«®1 


3254 

5253 


JMP 



3-255 

7200 


CLA 




3256 

5651 


JMP 

I 

TYPE 



/ 

/ 

/ 
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) 


aindec 

:-08-dh6ra«a 

PAL10 

V141 

3257 

7604 

EPASS, 

LAS 


3260 

077 7' 


AND 

SR04 

3261 

7640 


SZA CLA 


3262 

5776' 


JMP 

INiTl 

3263 

7604 


LAS 


3264 

0775' 


AND 

SR05 

3265 

7640 


SZA CLA 


3266 

5272 


JMP 

EPAS1 

3267 

4442 


.. J MS I 

XPRINf 

3270 

3274 


MEP®1 


3271 

5776' 


JMP 

INIT1 

3272 

1374 

EPASli 

TAD 

(207 

3273 

4251 


JMS 

TYPE 

3274 

5776' 


JMP 

INIT1 

3275 

3736 . 

MEPa 

TEXT 

/••DR/ 

3276 

0422 




3277 

0000 





/TELETYPE MESSAGES 
/ 

3374 0207 

3375 2740 

3376 0400 

3377 2737 

3400 PAGE 

3400 3736 Mis TEXT /**SET SR FOR DEVICE CODE AND CONT/ 

3401 2305 

3402 2440 

3403 2322 

3404 4006 

3405 1722 

3406 4004 

3407 0526 

3410 1103 

3411 0540 
S4i2 0317 

3413 0405 

3414 4001 

3415 1604 

3416 4003 

3417 1716 

3420 2400 

3421 3736 M2s TEXT Z^^SEt SR FOR INTERRUPT JUMPERS AND CONT/ 

3422 2305 

3423 2440 

3424 2322 

3425 4006 

3426 1722 

3427 4011 

3430 1624 

3431 0522 

3432 2225 

3433 2024 






/, 



3434 

4012 

3435 

2515 

3436 

2005 

3437 

2223 

3440 

4001 

3441 

1604 

3442 

4003 

3443 

1716 

3444 

2400 

3445 

3736 

3446 

2305 

3447 

2-440 

3450 

2327 

3451 

1124 

3452 

0310 

3453 

0523 

3494 

4006 

3455 

1722 

3456 

4006 

3457 

1411 

3460 

2006 

3461 

1417 

3462 

2040 

3463 

1225 

3464 

1520 

3465 

0522 

3466 

2340 

3467 

0116 

3470 

0440 

3471 

.0317 

3472 

1624 

3473 

1116 

3474 

2505 

3475 

0000 

3476 

3736 

3477 

2305 

.3.500 

2440 

3501 

2322 

3502 

4006 

3503 

1722 

3504 

4022 

3505 

2516 

3506 

4001 

3507 

1604 

3510 

4003 

3511 

1716 

3512 

2400 

3513 

3736 

3514 

0000 


3515 

0000 

3516 

3736 

3517 

2205 


M2A s 


M3 s 


CRLF t 


DH0« 
DHl s 


PAL10 V141 


29»MAR»72 
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TEXT /**SE? SWITCHES FOR Ft JPFL0P JUMPERS AND CONTINUE/ 


TEXT /«?? SET SR FOR RUN AND CON?/ 


TEXT t*rf 


/ 

/DATA HEADERS 


/ 

0 


i 


text 



/MAINDEC<P.08eDHDRA«A PAL10 

3520 0711 

3521 2324 

3522 2522 

3523 4004 

3524 0124 

3525 0100 

3526 3736 DH2i TEXT 

3527 0103 

3530 4003 

3531 1716 

3532 2405 

3533 1624 

3534 2300 

3535 3736 DH3, TEXT 

3536 1501 

3537 2313 

3540 4040 

3541 4040 

3542 4040 

3543 4040 

3544 4040 

3545 0530 

3546 2005 

3547 0324 

3550 0504 

3551 4040 

3552 4040 

3553 4040 

3554 2205 

3555 0305 

3556 1126 

3557 0504 

3560 '0000 

3561 3736 DH4, TEXT 

3562 0530 

3563 2005 

3564 0324 

3565 0504 

3566 4040 

3567 4040 

3570 4040 

3571 2205 

3572 0305 

3575 1126 

3574 0504 

3575 0000 

3576 3736 DM 5 b TEXT 

3577 2205 

3600 0711 

3601 2324 

3602 0522 

3603 4040 

3604 4040 

3605 4040 

3606 4004 


V141 29oMAR»72 16*107 


/* ♦AC CONTENTS/ 


/♦•♦MASK EXPECTED 


/•♦EXPECTED RECEIVED/ 


/•♦REGISTER DATA OUT 


PAGE 1^28 


RECEIVED/ 


DATA In/ 


o 



DECe»0'8®OHQRA>*A 


29®MAR-72 



3607 0124 

3610 0140 

3611 1725 

3612 2440 

3613 4040 

3614 4040 

3615 4040 

3616 0401 

3617 2401 

3620 4011 

3621 1600 

3622 3736 

3623 0103 

3624 4003 

3625 1716 

3626 2405 

3627 1624 

3630 2340 

3631 4040 

3632 4004 

3633 0124 

3634 0140 

3635 1725 

3636 2440 

3637 4040 

3640 4040 

3641 4040 

3642 04.01 

3643 2401 

3644 4011 

3645 1-600 


3646 1725 

3647 2420 

3650 2524 

3651 4022 

3652 0507 

3653 4016 

3654 1724 

3655 4003 

3656 1405 

3657 0122 

3660 0504 

3661 0000 

3662 1116 

3-663 2025 

3664 2440 

3665 2205 

3.666 0740 

3667 1617 

3670 2440 

3671 0314 

3672 0501 



0H6» TEXT /MAC CONTENTS DATA OUT 


/ 

/ERROR MESSAGE 
/ 

INXTIE s TEXT /OUTPUT RES NOT CLEARED/ 


!NJT2E 3 TEXT /INPUT REG NOT CLEARED/ 


PAGE 1*29 



DATA In/ 



/MAIND£Co08«DH0RA«A 


PAU0 


V141 


29®MAR=72 


16(07 PAGE 1-30 


3673 2205 

3674 0400 

3675 2313 

3676 1120 

3677 4006 

3700 1401 

3701 0740 

3702 2305 

3703 2400 

3704 0402 

3705 2217 

3706 4004 

3707 1104 
3710. 4016 

3711 1724 

3712 4003 

3713 1405 

3714 0122 

3715 4001 

3716 0300 

3717 0402 

3720 2211 

3721 4004 

3722 1104 

3723 4016 

3724 1724 

3725 40%3 

3726 1405 

3727 0122 

3730 4001 

3731 0300 

3732 0402 

3733 2317 

3734 4003 

3735 1001 

3736 1607 

3737 0504 

3740 4001 

3741 0300 

3742 0402 
3743- 0317 

3744 4003 

3745 1001 

3746 1607 

3747 0504 

3750 4001 

3751 0300 

3752 0402 

3753 0311 

3754 4003 

3755 1001 

3756 1607 

3757 0504 

3760 4001 

3761 0300 


!NIT3E* TEXT 


TRANlE, TEXT 


TRAN2E. TEXT 


transe* text 


TRAN4E s text 


fRAN5Ea TEXT 


/SKIP FLAG SET/ 


/DBRQ DSD NOT CLEAR AC/ 


/DBRI DID NOT CLEAR AC/ 


/DBSO CHANCED AC/ 


/DBCO CHANCED AC/ 


/DBG I CHANGED AC/ 




EC«08®DHDRA®A 


PAL10 V141 


29c=MAR-72 
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/M- 


3762 0402 

15763 2317 

3764 4005 

3765 2222 

3766 1722 

3767 3000 

3770 0402 

3771 0317 

3772 4005 

3773 2222 

3774 1722 

3775 0000 

3776 0402 

3777 22i7 

4000 4005 

4001 2222 

4002 1722 

4003 0000 

4004 0402 

4005 0311 

4006 4005 

4007 2222 

4010 1722 

4011 0000 

4012 1116 

4013 2025 

4014 2440 

4015 2205 

4016 0711 

4017 2324 

4020 0522 

4021 4004 

4022 0124 

4023 0140 

4024 0522 

4025 2217 

4026 2230 

4027 1401 

4030 2403 

4031 1040 

4032 0522 

4033 2217 

4034 2200 

4035 0402 

4036 2211 

4037 4005 

4040 2222 

4041 1722 

4042 0000 

4043 1116 

4044 2405 

4045 2222 

4046 2520 

4047 2440 

4050 0103 


OUUE. TEXT 


0UT4E. TEXT 


0UT7E, TEXT 


!N2E > TEXT 


iN3E, TEXT 


IN4E» TEXT 


iN*E, TEXT 


INTIE a T.EXT 


/DBSD ERROR/ 


/DBCO ERROR/ 


/DBRQ ERROR/ 


/DBGI ERROR/ 


/INPUT RESISTER DATA ERROR? 


/LATCH ERROR/ 


/QBRI ERROR/ 
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4051 

2411 


4052 

2605 


4053 

0000 


4054 

1617 

IN T 2 E 

4055 

4011 


4056 

1624 


4057 

0522 


4060 

2225 


4061 

2024 


4062 

5440 


4063 

2313 


4064 

1120 


4065 

0000 


4066 

1116 

INT3E 

4067 

2405 


4070 

2222 


4071 

2520 . 


4072 

2434 


4073 

4016 


4074 

1740 


4075 

2313 


4076 

1120 


4077 

0000 


4100 

1617 

! N T 4 E 

4101 

4011 


4102 

1624 


4103 

0522 


4104 

2225 


4105 

2024 


4106 

5440 


4107 

1617 


4110 

4023 


4111 

1311 


4112 

2000 


4113 

1617 

INT5E 

4114 

4023 


411-5 

1311 


4116 

2000 


4117 

2313 

INT6E 

4120 

1120 


4121 

0000 




$ 

0177 

7716 



TEXT 

TEXT 

TEXT 

TEXT 

TEXT 


/NO INTERRUPT, SKIP/ 

/ INfERRUPTs NQ SKIP/ 

/NO INTERRUPT, NO SKIP/ 

/NO SKIP/ 

/SKIP/ 
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0000 

0100 

00000000 

00000000 

10000000 

00000000 

Uiiuii 

00000000 

umiii 

00000300 

111UU0 

00000000 

00000000 

00000000 

00000000 

00000000 

00000000 

00000001 

0200 

0300 

illlllii 

11111111 

illlllii 

mum 

ililini 

iuum 

Illlllii 

10000000 

mum 

00000000 

mum 

00000000 

iiiiiiu 

00000000 

llllllii 

00000111 

0400 

0500 

ilUUii 

illlllii 

uimu 

ilium 

iiiiiiu 

uiiiiii 

uiiuii 

mum 

mum 

mum 

mmu 

mum 

illlllii 

Uiiiiii 

Iiliuii 

llllllii 

0600 

0700 

iiliuii. 

00000000 

illlllii 

00000000 

iuiiiii 

00000000 

uiiuii 

00000000 

mum 

00000000 

1U00000 

00000000 

00000000 

03000000 

00000300 

00000001 

1000 

1100 

illlllii 

ilium 

imiiii 

uiiiiii 

Uiiiiii 

illlllii 

iuiiiii 

umiii 

mum 

11110000 

illlllii 

00000000 

Illlllii 

00000000 

liiiliii 

00000001 

1200 

1300 

iiliuii 

iuum 

iiliuii 

iiliuii 

uiiiiii 

uiiuii 

Uiiiiii 

uiiuii 

mum 

mum 

mmu 

00000000 

llllllii 

00000000 

liiiliii 

00000001 

1400 

1500 

iiliuii 

iiliuii 

uiiuii 

11110000 

mum 

00000000 

UUUiI 

00000000 

mum 

00000000 

mmu 

00000000 

Illlllii 

00000000 

illlllii 

03000001 

1600 

1700 

iiliuii 

iiliuii 

Uiiuii 

Uiiiiii 

UllilU 

11111111 

illlllii 

iliiilBB 

mum 

30000300 

mum 

00000000 

Iimui 

00000000 

llllllii 

00000001 

2000 

210.0 

iiliuii 

ilium 

uiiuii 

11111110 

uimu 

00000000 

Illlllii 

03300000 

iiiiiiu 

00000000 

mmu 

00000000 

llllllii 

00000000 

illiilU 

00000001 

2200 

2300 

iiliuii 

iuiiiii 

uiiiiii 

uiiiiii 

iuiiiii 

mum 

llllllii 

mmli 

mum 

mum 

mmu 

mmu 

Uiiiiii 

11111110 

Iiliuii 

00000001 

2400 

2500 

illlllii 

illlllii 

uiiiiii 

11100000 

iiiiiiu 

00000000 

iuiiiii 

30000300 

mum 

00000000 

mmu 

00000000 

Iiliuii 

00000000 

iiliuii 

00000001 

2600 

2700 

illlllii 

iiliuii 

uiiuii 

uiiiiii 

illlllii 

Uiiiiii 

umiii 

umiii 

..mum 

11000000 

uiiuii 

00000003 

Iiliuii 

30000000 

Iiliuii 

000iUii 

3000 

3100 

iuiiiii 

00000000 

Uiiuii 

00000000 

uiiiiii 

00000000 

umiii 

00000003 

mum 

00003300 

11100000 

00000000 

00000000 

@0000003 

00000000 

01111111 

3200 

3300 

illlllii 

00000000 

Uiiiiii 

00000000 

iuum 

00000000 

illlllii 

03000000 

mum 

@3000000 

mmu 

33030.000 

iiillil1 
@0000000 

iiliuii 

00001111 

3400 

3500 

illlllii 

iuiiiii 

uiiuii 

uiiuii 

illlllii 

illlllii 

iuiiiii 

Uiiiiii 

mum 

mum 

mmu 

mmu 

■Uiiiiii 

Illlllii 

Illlllii 

iiliuii 

3600 

3700 

ilUUii 

ilUUii 

ilium 

iiliuii 

iuum 

mum 

uiiuii 

iuiiiii 

mum 

mum 

mmu 

mum 

Illlllii 

llllllii 

iiliuii 

iiliuii 
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4000 11UU11 11111111 11111111 Ullllil 11111111 11111111 Illlilil lillllll 

4100 illlllll llllllil 11000000 00000000 00000000 00000000 00000000 00000000 

4200 

4300 

4400 

4500 

4600 

4700 


50-00 

5100 

5200 

5300 

5400 

5500 

5600 

5700 


6000 

6100 

6200 

6300 



7600 

7700 
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SIT01 

3035 

I NIB 

1420 

K0077 

3243 

SR06 

2741 

BITOUT 

3031 

IN2 

1434 

K212 

3246 

SRS 

6003 

BITS 

2646 

I N2E 

4004 

K215 

3245 

SfARTl 

0202 

BSW 

7002 

IN3 

1462 

K240 

3230 

START2 

0244 

CAP 

6007 

IN 3 A 

1466 

K33'6. 

3247 

TlOT 

0250 

cntri 

0020 

IN3E 

4012 

LOOP! 

2667 

TRAN1 

0460 

C.RLF 

3513 

IN4E 

4027 

LOOP 2 

27£2 

TRAN1E 

3704 

DATA! 

0021 

INS 

1600 

lpiexa 

26f 7 

TRAN2 

0477 

DA?A2 

0022 

IN5 A 

1604 

UP1EXT 

2705 

YRAN2E 

3717 

DATA3 

0023 

IN5C 

1633 

L.P1EXX 

27ll 

TRAN3 

0516 

DATA4 

0024 

IN6 

1637 

LP2EXT 

2726 

TRAN3E 

3732 

data? 

0025 

IN6A 

1644 

lpcnt 

0031 

TRAN4 

0536 

data? 

2665 

IN6C 

1672 

LS'TDCT 

3017 

TRAN4E 

3742 

Oatcnt 

2664 

IN7 

1676 

HI 

3400 

TRAN5 

0556 

DATOUT 

2641 

IN7 A 

1702 

M2 

3421 

TRAN5E 

3752 

OBCI 

4435 

IN7C 

1731 

H2A 

3445 

TRAN6 

0600 

obcix 

0300 

INS 

2000 

M3 

3476 

TRAN7 

0616 

DBGO 

4437 

INSA 

2005 

M40 

3244 

TRANS 

0634 

DBCOX 

0312 

IN9 

2030 

MEP 

3275 

TVPE 

3251 

OBDI 

4432 

INRA 

2034 

MESG 

2634 

typflg 

0030 

DSD IX 

0261 

IN?E 

4035 

MSA 

7501 

TYPSET 

3215 

DBF I 

4433 

INIT1 

0400 

MQL 

7421 

XDBCI 

0035 

dbeix 

0266 

I MI TIE 

3646 

mstdgt 

3026 

XDBCQ 

0037 

DBR I 

4436 

INIT2 

0416 

MTP 

3241 

XDBDI 

0032 

DB^IX 

0305 

INIT2E 

3662 

qstasc 

3000 

XDiEI 

0033 

dbro 

4441 

INIT3 

0435 

0UT1 

1000 

XD8RI 

@036 

DBRQX 

0324 

INIT3E 

3675 

0UT1E 

3762 

xdbrq 

0041 

D8SK 

4434 

INOU1 

2200 

0UT2 

1033 

XDBSK 

0034 

DBSKX 

0273 

INOU1A 

2205 

0UT3 

1054 

XDBSO 

0040 

DBSO 

4440 

IN0U2 

2230 

0UT3A 

1060 

xerror 

0044 

D8SOX 

0317 

IN0U2A 

2235 

QUT4 

1105 

XLOOP1 

0045 

DNS 

3515 

I NOUS 

2260 

0UT4A 

llll 

XL8QP2 

0046 

DHl 

3516 

IN0U3A 

2265 

0UT4E 

3770 

XPRINT 

0042 

DH2 

3526 

INOU4 

2325 

OUTS 

1200 

XfYPE 

0043 

DN3 

353-5 

INOU4A 

2331 

0UT5A 

1205 



DH4 

3561 

INTI 

2400 

OUT 6 

1230 



DH5 

3576 

intia 

2404 

OUT 6 A 

1234 



DH6 

3622 

intiae 

2431 

QUT7 

1262 



DHQER. 

263.6 

intibe 

2446 

OUT? A 

i2#6 



DJO? 

0260 

t NT lcS 

24§3 

0UT7E 

3776 



EH-ALt 

265-4 

INTiD 

2441 

0UT8 

1315 



ERA.S1 

3272 

INTIE 

4043 

0UT8A 

1322 



EPASS 

3257 

I NT10K 

2437 

pntri 

0-233. 



ERADR 

3025 

INT2E 

4054 

POr-NTl 

0010 



errad 

2666 

INT3 

2460 

PRINT 

3200 



ERROR 

2600 

IN T 3 A 

2464 

SPLIT 

3 012 



FJUMPE 

0027 

INT3C 

2506 

SR0B 

2733 



IJUHPE 

0026 

INT3.E 

4066 

SR 81 

2734 



INI 

1400 

IN T 4 E 

4100 

SR®2 

2735 



IN 10 

2063 

INT5E 

4113 

SR03 

2736 



IN10.A 

2070 

INT6E 

4117 

SR04 

2737 



INI A 

1403 

I QTS 

0247 

sR0y 

2740 
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ERRORS DETECTEDl 0 
LINKS GENERATED! 18 
RUN-TIME| 15 SECONDS 

3K CORE USED 
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